Mac Power 1997 October/MACPOWER-1997-10.ISO.7z/MACPOWER-1997-10.ISO/AMUG/PROGRAMMING/Mac F2C 1.3.5.sit/Mac F2C 1.3.5/Mac F2C Libraries/libF77 Sources/h_len.c

C/C++ Source or Header | 1995-01-28 | 138b | 11 lines

#include "f2c.h"

#ifdef KR_headers
shortint h_len(s, n) char *s; ftnlen n;
#else
shortint h_len(char *s, ftnlen n)
#endif
{
return(n);
}